home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 26.zip / BS1 part 26 / C for beginners.adf / source / strchbac.c < prev    next >
Text File  |  1978-01-17  |  707b  |  21 lines
  1. /*  Filename: "strchbac.c" */
  2. /**********************************************************************/
  3. /* Name:          strchback                                           */
  4. /* Parameter:     s (String), c (char)                                */
  5. /* Return value: Index (int)                                          */
  6. /* Function: Searches for Position of Character "c" in "s"            */
  7. /* Other: requires c_comp(), strlen()                                 */
  8. /**********************************************************************/
  9.  
  10. strchback(s,c)
  11. register char s[];
  12. register char c;
  13. {
  14.   register int i = strlen(s);
  15.   while((i >= 0) && !c_comp(s[i],c) )
  16.     i--;
  17.   return(i);  /* Error = -1 */
  18. }
  19.  
  20.  
  21.